home *** CD-ROM | disk | FTP | other *** search
- ░░░░░░ ░░░░░░ ║ ║ ╔═╗ ╔═╗ ╔═╗ ═╦═ ╔══ ╔═╗ ╔══ ═╦═
- ░░░░░░░░░░░ ░░░░░░░░░░░ ╠═╣ ╠═╝ ╠═╣ ╠═╩╗ ║ ═ ╚═╗ ║ ║ ╠═ ║
- ░░░░░░░░_░_░░░░░░░░░░░░░░ ║ ║ ╚══ ║ ║ ║ ║ ║ ══╝ ╚═╝ ║ ║
- ░░░░░░░/_/\/\░░░░░░░░░░░░
- ░░░░░░\_\ /░░░░░░░░░░░ F L O W C H R T (Ver: 1.1)
- ░░░░░/_/ \░░░░░░░░░░ (BASIC PROGRAM FLOWCHARTER)
- ░░░░\_\/\ \░░░░░░░░ (c) Copyright 1985, 1986
- ░░░░░\ \ \░░░░░ By Lynn R. Lively. All Rights Reserved.
- ░░░░░\ \░░░░░
- ░░░░░░░░░░░ Flowchrt is distributed on a User Supported basis.
- ░░░░░░░ \ The User is given permission to copy and distribute
- ░░░\_\/ this software as long as the program is unmodified
- ░ and no more than $5 is charged (for copy service).
- "Give, and it will be If you find this software to be of value, please
- given to you; good send a $25 contribution to:┌────────────────────┐
- measure, pressed down, │ World Vision │
- shaken together, running Source is available │ P.O. Box O │
- over, will be put into. by sending $100 to: │ Pasadena, CA 91109 │
- your lap. For the measure ┌──────────────────────────┴────────────────────┴─┐
- you give will be the │ Lynn R. Lively, 3718 Las Palmas,Houston,TX 77027│
- measure you receive." └─────────────────────────────────────────────────┘
- - Luke 6.38 - Also send any comments/suggestions to this address.
-
-
- I'm asking $100 dollars for the source, but if you sen me a photostat
- of your contribution reciept you can have it for $40.
- Send and sugestions/comments to the above address or call DG-HAUS BBS
- at 681-9629 between 6PM - 8am.
-
- God has burdened my heart with the plight of all the people
- in this world who don't know where their next meal will come from (or
- if). I hope you will join with me and others to help eradicate hunger
- as a cause of death on this earth. I know this sounds impossible, and
- it surely is if we do nothing about it. We can at least make a very
- large dent in this problem. I am working on other software to
- distribute in the same manner. I pray that the Lord may see fit to let
- this concept catch on and use it to further His work in the world.
- Heart-Soft is more of a concept than a company. My desire is to make it
- easy for you to justify helping someone else. I hope the concept will
- catch on. If you feel as I do let me know.
-
- Flowchrt Operating Instructions
-
- Two files are required to run Flowchrt. They are 'FLOWCHRT.EXE' and
- 'FLOWCHRT.001'. FLOWCHRT.001 must be in your working directory but
- FLOWCHRT.EXE may be found by a path.
-
- To run Flowchrt type 'FLOWCHRT' from the MSDOS prompt. The program
- will display the Heart-Soft initial screen. Type any key to continue.
- You will now be asked three questions that may seem strange.
-
- MAX FORWARD REFERENCES TO TRAK: [19]
-
- MAX BACKWARD REFERENCES TO TRAK: [19]
-
- MAX CHARS OF SOURCE LINE TO DISPLAY PER DISPLAY LINE: [40]
-
- These refer to how the program will appear.
- Flowchrt displays your program in three columns source line, forward
- references, and backward references. The questions refer to how many print
- positions you want to dedicate to each. The default settings are shown
- in the square brackets. Next you will see this message.
-
- Total output line size is 79
-
- Is this correct? (Y,N)
-
- Notice that if you took the defaults this number is 1 greater than the
- sum of the numbers. This is because I put a space after the display line
- just to keep things looking pretty. If you need to you can specify upto
- 104 positions for forward/backward references and upto 80 for the source
- line. If the settings match your requirements answer 'Y' to the question
- (Note: You will only be asked these questions once per program execution).
- Next you will be asked to enter the input filespec. You may type a
- pathname in here if you like. The file must have been saved with the 'A'
- option on the save command (This makes the BASIC program int just another
- ASCII text file). Next you will be asked to enter the output filespec.
- You may send the program to any valid file or devicename you like (If
- you have a hard disk, you will find it faster to send the flowchart out to
- a disk file). Next you will be asked to specify a heading line for the
- flowchart. This option allows you to put your own heading on the
- flowchart. You can also use this line to enter any escape sequences or
- such to set up your printer. Once you hit return you're off and running.
- When Flowchrt finishes it will beep and ask you if you want to exit. If
- you need flowcharts of several programs say 'N' and you will be asked for
- another input filespec. Here is an example flowchart generated by
- Flowchrt.
-
-
- FLOWCHART OF EXAMPLE.BAA AS OF 01-23-1986 19:00:57
-
- 10
- 'EXAMPLE OF A VERY POOR PROGRAM
- 20 <
- GOTO 60 > A
- 30 a A<
- GOSUB 80 a> AB
- 40 ab AB
- IF A=B ab AB
- THEN GOTO 20 ab >B
- 50 ab AB
- IF A=B THEN GOSUB 60 >b AB
- : GOSUB 80 a> AB
- : GOTO 20 ab >B
- 60 <b B
- IF A=B THEN 80 > B
- ELSE 30 b >
- 70 b
- ON A GOSUB 90,100,110 >b>>
- 80 a<cd
- 'THIS GOTO 20 AND GOSUB 20 ARE a cd
- IGNORED a cd
- 90 < cd
- PRINT"LINES WILL BE BROKEN OUT AT cd
- :" cd
- : PRINT "I DON cd
- 'T CHECK TO SEE IF ITS WITHIN DOUBLE cd
- QUOTES" cd
- : PRINT "BUT THIS SHOULDN cd
- 'T HAPPEN THAT OFTEN ANYWAY" cd
- 100 <d
- REM THIS GOTO 10 IS IGNORED ALSO d
- 110 <
- 'AS YOU CAN SEE THIS PROGRAM READS
- LIKE SPAGETTI AND IS ALL TO TYPICAL
- OF THE CODE YOU MAY BE ASKED TO
- MODIFY. THE PURPOSE IS TO TRY AND
- GENERATE SOME SENSE OF ORDER."
- 120
- 'NOTICE VERY LONG LINES ARE BROKEN
- AT CONVENIENT PLACES IF POSSIBLE.
- IF NOT YOU WILL PROBABLY GET
- SOMETHING LOOKING LIKE THIS"
- 130
- 'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
- XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
- XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
- XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
- XX
- '
-
- CROSS REF OF 'GO' LINE TO TARGET(s)
-
- GO LINE TARGET(s)
- 20
- 60
- 30
- 80
- 40
- 20
- 50
- 60 80 20
- 60
- 80 30
- 70
- 90 100 110
-
- CROSS REF OF 'TARGET' LINE TO GO(s)
-
- TARGET GO LINE(s)
- 20
- 50 40
- 30
- 60
- 60
- 50 20
- 80
- 50 60 30
- 90
- 70
- 100
- 70
- 110
- 70
- 60
- 60
- 50 20
- 80
- 50 60 30
- 90
- 70
- 100
- 70
- 110
-